home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / utils / file / managers / mc-3.2 / mc-3 / mc-3.2.1 / src / fixhlp.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-05-17  |  6.4 KB  |  248 lines
  1. /* HLP converter
  2.    Copyright (C) 1994, 1995 Janne Kukonlehto
  3.    Copyright (C) 1995  Jakub Jelinek
  4.    
  5.    This program is free software; you can redistribute it and/or modify
  6.    it under the terms of the GNU General Public License as published by
  7.    the Free Software Foundation; either version 2 of the License, or
  8.    (at your option) any later version.
  9.    
  10.    This program is distributed in the hope that it will be useful,
  11.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13.    GNU General Public License for more details.
  14.  
  15.    You should have received a copy of the GNU General Public License
  16.    along with this program; if not, write to the Free Software
  17.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  18.  
  19. #include <config.h>
  20. #include <stdio.h>
  21. #include <stdlib.h>
  22. #include <stdarg.h>
  23. #include <string.h>
  24. #include "help.h"
  25.  
  26. #define BUFFER_SIZE 256
  27.  
  28. static int width;        /* Output width in characters */
  29. static int col = 0;        /* Current output column */
  30. static FILE *toc_file;        /* TOC file */
  31. static int out_row = 1;        /* Current output row */
  32. static int in_row = 0;        /* Current input row */
  33. static int indent = 1;
  34. static int curindent = 1;
  35. static int freshnl = 1;
  36. static int firstlen = 0;
  37. static int verbatim = 0;
  38.  
  39. /* Report error in input */
  40. void print_error (char *message)
  41. {
  42.     fprintf (stderr, "fixhlp: %s at row %d\n", message, in_row);
  43. }
  44.  
  45. /* Change output line */
  46. void newline (void)
  47. {
  48.     out_row ++;
  49.     col = indent;
  50.     curindent = indent;
  51.     printf("\n%*s", indent, "");
  52.     freshnl = 1;
  53.     firstlen = 0;
  54. }
  55.  
  56. /* Calculate the length of string */
  57. int string_len (char *buffer)
  58. {
  59.     static int anchor_flag = 0;    /* Flag: Inside hypertext anchor name */
  60.     static int link_flag = 0;    /* Flag: Inside hypertext link target name */
  61.     int i;            /* Index */
  62.     int c;            /* Current character */
  63.     int len = 0;        /* Result: the length of the string */
  64.  
  65.     for (i = 0; i < strlen (buffer); i ++)
  66.     {
  67.     c = buffer [i];
  68.     if (c == CHAR_LINK_POINTER) 
  69.         link_flag = 1;    /* Link target name starts */
  70.     else if (c == CHAR_LINK_END)
  71.         link_flag = 0;    /* Link target name ends */
  72.     else if (c == CHAR_NODE_END){
  73.         /* Node anchor name starts */
  74.         anchor_flag = 1;
  75.         /* Ugly hack to prevent loss of one space */
  76.         len ++;
  77.     }
  78.     /* Don't add control characters to the length */
  79.     if (c < 32)
  80.         continue;
  81.     /* Attempt to handle backslash quoting */
  82.     /* Increase length if not inside anchor name or link target name */
  83.     if (!anchor_flag && !link_flag)
  84.         len ++;
  85.     if (anchor_flag && c == ']'){
  86.         /* Node anchor name ends */
  87.         anchor_flag = 0;
  88.     }
  89.     }
  90.     return len;
  91. }
  92.  
  93. /* Output the string */
  94. void print_string (char *buffer)
  95. {
  96.     int len;    /* The length of current word */
  97.     int i;    /* Index */
  98.     int c;    /* Current character */
  99.     char *p;
  100.  
  101.     /* Split into words */
  102.     if (verbatim) {
  103.         printf ("%s", buffer);
  104.         newline ();
  105.         return;
  106.     }
  107.     p = strchr (buffer, CHAR_LINK_POINTER);
  108.     if (p) {
  109.         char *q;
  110.         
  111.         *p = 0;
  112.         print_string (buffer);
  113.         q = strchr (p + 1, CHAR_LINK_END);
  114.         if (q) {
  115.             *q = 0;
  116.             printf ("%c%s%c", CHAR_LINK_POINTER, p + 1, CHAR_LINK_END);
  117.             print_string (q + 1);
  118.         } else {
  119.             /* Error, but try to handle it somehow */
  120.             printf ("%c", CHAR_LINK_END);
  121.         }
  122.         return;
  123.     }
  124.     buffer = strtok (buffer, " \t\n");
  125.     /* Repeat for each word */
  126.     while (buffer){
  127.     /* Skip empty strings */  
  128.     if (strlen (buffer) > 0){
  129.         len = string_len (buffer);
  130.         /* Change the line if about to break the right margin */
  131.         if (col + len >= width)
  132.         newline ();
  133.         /* Words are separated by spaces */
  134.         if (col > curindent){
  135.         printf (" ");
  136.         col ++;
  137.             }
  138.         printf ("%s", buffer);
  139.         /* Increase column */
  140.         col += len;
  141.     }
  142.     /* Get the next word */
  143.     buffer = strtok (NULL, " \t\n");
  144.     } /* while */
  145.     if (freshnl) {
  146.         firstlen = col - curindent;
  147.         freshnl = 0;
  148.     }
  149. }
  150.  
  151. /* Like print_string but with printf-like syntax */
  152. void printf_string (char *format, ...)
  153. {
  154.     va_list args;
  155.     char buffer [BUFFER_SIZE];
  156.  
  157.     va_start (args, format);
  158.     vsprintf (buffer, format, args);
  159.     va_end (args);
  160.     print_string (buffer);
  161. }
  162.  
  163. int main (int argc, char **argv)
  164. {
  165.     int len;            /* Length of input line */
  166.     char buffer [BUFFER_SIZE];    /* Input line */
  167.     int i, j;
  168.     char *p; 
  169.     int ignore_newline = 0;
  170.  
  171.     /* Validity check for arguments */
  172.     if (argc != 3 || (width = atoi (argv[1])) <= 10){
  173.     fprintf (stderr, "Usage: fixhlp <width> <tocname>\n");
  174.     return 3;
  175.     }
  176.     
  177.     if ((toc_file = fopen (argv[2], "w")) == NULL) {
  178.         fprintf (stderr, "fixhlp: Cannot open toc for writing");
  179.         return 4;
  180.     }
  181.     fprintf (toc_file, "\04[Contents]\n Topics:\n\n");
  182.  
  183.     /* Repeat for each input line */
  184.     while (!feof (stdin)){
  185.     /* Read a line */
  186.     if (!fgets (buffer, BUFFER_SIZE, stdin)){
  187.         break;
  188.     }
  189.     in_row ++;
  190.     len = strlen (buffer);
  191.     /* Remove terminating newline */
  192.     if (buffer [len-1] == '\n')
  193.     {
  194.         len --;
  195.         buffer [len] = 0;
  196.     }
  197.     if (!buffer[0]) {
  198.         if (ignore_newline)
  199.             ignore_newline = 0;
  200.         else
  201.             newline ();
  202.     } else {
  203.         if (buffer [0] == 4 && buffer [1] == '[') {
  204.             for (p = buffer + 2; *p == ' '; p++);
  205.             fprintf (toc_file, "%*s\01 %s \02%s\03\n", p - buffer + 1, "", p, p);
  206.             printf ("\04[%s]\n %s", p, p);
  207.         } else if (buffer [0] == CHAR_RESERVED && buffer [1] == '"') {
  208.             continue;
  209.         } else {
  210.             char *p, *q;
  211.             int i;
  212.             
  213.             for (p = buffer, q = strchr (p, CHAR_RESERVED); q != NULL;
  214.                 p = q + 1, q = strchr (p, CHAR_RESERVED)) {
  215.                 *q = 0;
  216.                 if (*p)
  217.                     print_string (p);
  218.                 q++;
  219.                 if (*q == '/')
  220.                     ignore_newline = 1;
  221.                 else if (*q == 'v')
  222.                     verbatim = 1;
  223.                 else if (*q == 'n')
  224.                     verbatim = 0;
  225.                 else {
  226.                     indent = *q - '0';
  227.                     if (ignore_newline) {
  228.                         i = firstlen;
  229.                         if (i > indent - curindent - 1)
  230.                             ignore_newline = 0;
  231.                         else {
  232.                             i = indent - curindent - i - 1;
  233.                             printf ("%*s", i, "");
  234.                             col += i;
  235.                         }
  236.                     }
  237.                 }
  238.             }
  239.             print_string (p);
  240.         }
  241.     }
  242.     }
  243.  
  244.     /* All done */
  245.     newline ();
  246.     return 0;
  247. }
  248.